use TestHelper;
use Entity;
use EntityTest;

$entity = Entity->spawn();
testType($entity, 'Entity');

@hashes = qw/ATTRIBUTES ACTIONS POS ATTRIBUTES/;
@scalars = qw/TYPE PIC/;
@expected = (@hashes, @scalars, @arrays);

testFields($entity,\@expected, \@hashes, \@scalars, \@arrays);

$name = 'uno';
$val = 1;
testAttributes($entity, $name, $val);

testAttributes($entity, 'PIC', 'a');

testPic($entity, 'x');

testContents($entity);

testPos($entity);
